home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 February: Tool Chest / Apple Developer CD Series Tool Chest February 1996 (Apple Computer)(1996).iso / Sample Code / AOCE Sample Code / PowerTalk Access Modules / Sample SMSAM / SampleSMSAM Source / SampleSMSAMServer / DebuggingMenus.r < prev    next >
Encoding:
Text File  |  1995-07-28  |  9.5 KB  |  244 lines  |  [TEXT/MPS ]
  1. /*
  2.     File:        DebuggingMenus.r
  3.  
  4.     Copyright:    © 1991-1994 by Apple Computer, Inc.
  5.                 All rights reserved.
  6.  
  7.     Part of the AOCE Sample SMSAM Package.  Consult the license
  8.     which came with this software for your specific legal rights.
  9.  
  10. */
  11.  
  12.  
  13.  
  14. #define SystemSevenOrLater 1
  15. #include "Types.r"
  16. #include "SysTypes.r"
  17.  
  18. #include "BovineConstants.h"
  19.  
  20. #define AllItems    0b1111111111111111111111111111111    /* 31 flags */
  21. #define NoItems        0b0000000000000000000000000000000
  22. #define MenuItem1    0b0000000000000000000000000000001
  23. #define MenuItem2    0b0000000000000000000000000000010
  24. #define MenuItem3    0b0000000000000000000000000000100
  25. #define MenuItem4    0b0000000000000000000000000001000
  26. #define MenuItem5    0b0000000000000000000000000010000
  27. #define MenuItem6    0b0000000000000000000000000100000
  28. #define MenuItem7    0b0000000000000000000000001000000
  29. #define MenuItem8    0b0000000000000000000000010000000
  30. #define MenuItem9    0b0000000000000000000000100000000
  31. #define MenuItem10    0b0000000000000000000001000000000
  32. #define MenuItem11    0b0000000000000000000010000000000
  33. #define MenuItem12    0b0000000000000000000100000000000
  34.  
  35. /***********************************|****************************************/
  36.  
  37. resource 'MENU' (kGatewayMenu, preload) {
  38.     kGatewayMenu, textMenuProc,
  39.     AllItems & ~MenuItem7,
  40.     enabled, "Gateway",
  41.     {
  42.         "2020∞Connector Gateway", noicon, nokey, nomark, plain;
  43.         "2020∞HFS Gateway", noicon, nokey, nomark, plain;
  44.         "HFS∞Connector Gateway", noicon, nokey, nomark, plain;
  45.         "ATS∞HFS Gateway", noicon, nokey, nomark, plain;
  46.         "HFS∞Pager Gateway", noicon, nokey, nomark, plain;
  47.         "HFS∞HFS Gateway", noicon, nokey, nomark, plain;
  48.         "-", noicon, nokey, nomark, plain;
  49.         "Autostart as 2020∞Connector gateway", noicon, nokey, nomark, plain;
  50.         "-", noicon, nokey, nomark, plain;
  51.         "Force Connector to connect", noicon, nokey, nomark, plain;
  52.         "Reenumerate last 2020 letter", noicon, nokey, nomark, plain;
  53.         "Reenumerate all 2020 letters", noicon, nokey, nomark, plain;
  54.         "Force ATS to connect", noicon, nokey, nomark, plain;
  55.         "Describe gateway status", noicon, nokey, nomark, plain;
  56.         "Show thread status", noicon, nokey, nomark, plain;        
  57.     }
  58. };
  59.  
  60. /***********************************|****************************************/
  61.  
  62. resource 'MENU' (kConfigMenu, preload) {
  63.     kConfigMenu, textMenuProc,
  64.     AllItems & ~MenuItem3,
  65.     enabled, "Config",
  66.      {
  67.         "Show config", noicon, nokey, nomark, plain;
  68.         "Show status", noicon, nokey, nomark, plain;
  69.         "-", noicon, nokey, nomark, plain;
  70.         "Set Config Item", noicon, nokey, nomark, plain;
  71.     }
  72. };
  73.  
  74. /***********************************|****************************************/
  75.  
  76. resource 'MENU' (kKeithMenu, preload) {
  77.     kKeithMenu, textMenuProc,
  78.     AllItems,
  79.     enabled, "Keith",
  80.     {    
  81.         "T2020Letter: show all calls", noicon, nokey, nomark, plain;
  82.         "T2020HGwy: show all calls", noicon, nokey, nomark, plain;
  83.         "Show long letters", noicon, nokey, nomark, plain;
  84.         "Show long recipients", noicon, nokey, nomark, plain;
  85.         "TCCL: Only run CCL #0", noicon, nokey, nomark, plain;
  86.         
  87.         /* 6 */
  88.         "TCCL: Pause all ccl engines", noicon, nokey, nomark, plain;
  89.         "Show CCL execution", noicon, nokey, nomark, plain;
  90.         "Show FT callback params", noicon, nokey, nomark, plain;
  91.         "Show CCL 'Debug' statements", noicon, nokey, nomark, plain;
  92.         "Show letters in MailGateway", noicon, nokey, nomark, plain;
  93.         /* 11 */
  94.         "Show Connector Out Address Logic", noicon, nokey, nomark, plain;
  95.         "Show AppleSingle (encl)", noicon, nokey, nomark, plain;
  96.         "Don't mark 2020 recipients", noicon, nokey, nomark, plain;
  97.         "Ignore recipient done status", noicon, nokey, nomark, plain;
  98.         "T2020Recipient: show all calls", noicon, nokey, nomark, plain;
  99.         /* 16 */
  100.         "Run CCL at TVMSafeMode", noicon, nokey, nomark, plain;
  101.         "Extensive CCL debugging", noicon, nokey, nomark, plain;
  102.         "Show ATS Transaction stuff", noicon, nokey, nomark, plain;
  103.         "ATS-List all items in inbox", noicon, nokey, nomark, plain;
  104.         "ATS-Don't send/receive enclosures", noicon, nokey, nomark, plain;
  105.         
  106.         /* 21 */
  107.         "CHGwy-Reconnect often", noicon, nokey, nomark, plain;
  108.         "2020Letter: Always set segmentID=0", noicon, nokey, nomark, plain;
  109.         "Frequent debug log flushes", noicon, nokey, nomark, plain;
  110.         "Delete old log files", noicon, nokey, nomark, plain;
  111.         "T2020HGwy: delete letters immediately", noicon, nokey, nomark, plain;
  112.     }
  113. };
  114.  
  115. /***********************************|****************************************/
  116.  
  117. resource 'MENU' (kSteveMenu, preload) {
  118.     kSteveMenu, textMenuProc,
  119.     AllItems,
  120.     enabled, "Steve",
  121.     {    
  122.         "Don't Decompress packages", noicon, nokey, nomark, plain;
  123.         "Don't Compress packages", noicon, nokey, nomark, plain;
  124.         "Show StatusMonitor Info", noicon, nokey, nomark, plain;
  125.         "Frequent StatusMonitor updates", noicon, nokey, nomark, plain;
  126.         "Write bundles to disk", noicon, nokey, nomark, plain;
  127.  
  128.         "Show AppleEvents", noicon, nokey, nomark, plain;
  129.         "Delete RecipientStatusDB", noicon, nokey, nomark, plain;
  130.         "Show Ack Stuff", noicon, nokey, nomark, plain;
  131.         "OCEHgwy immediately acks recipients", noicon, nokey, nomark, plain;
  132.         "ConnHgwy immediately acks recipients", noicon, nokey, nomark, plain;
  133.  
  134.         "ConnHgwy: Show all calls", noicon, nokey, nomark, plain;
  135.         "InBndlProcessor: Show all calls", noicon, nokey, nomark, plain;
  136.         "OutBndlProcessor: Show all calls", noicon, nokey, nomark, plain;
  137.         "ConnLetter: Show all calls", noicon, nokey, nomark, plain;
  138.         "OutBndl: Immediately submit bundles", noicon, nokey, nomark, plain;
  139.  
  140.         "Show CTB protocol", noicon, nokey, nomark, plain;
  141.         "Show TTY protocol", noicon, nokey, nomark, plain;
  142.         "Show virtual file stuff", noicon, nokey, nomark, plain;
  143.         "Show CTB Status calls", noicon, nokey, nomark, plain;
  144.         "ConnHGwy ccl does not support removes", noicon, nokey, nomark, plain;
  145.  
  146.         "Show Squeeze Stuff", noicon, nokey, nomark, plain;
  147.     }
  148. };
  149.  
  150. /***********************************|****************************************/
  151.  
  152. resource 'MENU' (kChrisMenu, preload) 
  153. {
  154.     kChrisMenu, textMenuProc, AllItems, enabled, "Chris",
  155.     {    
  156.         "Full tuple key describe", noicon, nokey, nomark, plain;
  157.         "Full tuple buffer describe", noicon, nokey, nomark, plain;
  158.         "Full tuple database describe", noicon, nokey, nomark, plain;
  159.         "Tuple describe in SetConfig", noicon, nokey, nomark, plain;
  160.         "B•Tree describe after error", noicon, nokey, nomark, plain;
  161.         "Don’t unmangle proc names", noicon, nokey, nomark, plain;
  162.         "Do frequent OCEObjects validity checks", noicon, nokey, nomark, plain;
  163.         "Report memory changed in Main thread", noicon, nokey, nomark, plain;
  164.         "Heap Object Tagging", noicon, nokey, nomark, plain;
  165.         "Call Debugger on Alloc/Dealloc error", noicon, nokey, nomark, plain;
  166.         "Call Debugger on Failure", noicon, nokey, nomark, plain;
  167.         "-", noicon, nokey, nomark, plain;
  168.         "HFS Database test", noicon, nokey, nomark, plain;
  169.         "RAM Database test", noicon, nokey, nomark, plain;
  170.         "B•Tree Database test", noicon, nokey, nomark, plain;
  171.         "Disk log test", noicon, nokey, nomark, plain;
  172.         "Dump Disk log", noicon, nokey, nomark, plain;
  173.         "CBuffer test", noicon, nokey, nomark, plain;
  174.         "All OCEObjects tests", noicon, nokey, nomark, plain;
  175.         "FileOfFiles tests", noicon, nokey, nomark, plain;
  176.         "Compress test", noicon, nokey, nomark, plain;
  177.         "Decompress test", noicon, nokey, nomark, plain;
  178.         "VirtualFile tests", noicon, nokey, nomark, plain;
  179.         "View current heap", noicon, "H", nomark, plain;
  180.         "View archived heap…", noicon, "V", nomark, plain;
  181.         "Archive current heap…", noicon, "A", nomark, plain;
  182.         "Compare current heap with archive…", noicon, "C", nomark, plain;
  183.     }
  184. };
  185.  
  186. /***********************************|****************************************/
  187.  
  188. resource 'MENU' (kAddressesMenu, preload) {
  189.     kAddressesMenu, textMenuProc,
  190.     AllItems & ~MenuItem8,
  191.     enabled, "Addresses",
  192.     {    
  193.         "Out 1=Allow recipient name in address", noicon, nokey, nomark, plain;
  194.         "Out 2=Allow path.path.path in address", noicon, nokey, nomark, plain;
  195.         "Out 3=Allow @$dNode in address", noicon, nokey, nomark, plain;
  196.         "Out 4=na", noicon, nokey, nomark, plain;
  197.         "Out 5=na", noicon, nokey, nomark, plain;
  198.         "Out 6=na ", noicon, nokey, nomark, plain;
  199.         "Out 7=na", noicon, nokey, nomark, plain;
  200.         "-", noicon, nokey, nomark, plain;
  201.         "In 1=userName:P1:P2@x#", noicon, nokey, nomark, plain;
  202.         "In 2=userName:$dNode@x#", noicon, nokey, nomark, plain;
  203.         "In 3=userName@X#", noicon, nokey, nomark, plain;
  204.         "In 4=$cid.cid:P1:P2@x#", noicon, nokey, nomark, plain;
  205.         "In 5=$cid.cid:$dNode@x#", noicon, nokey, nomark, plain;
  206.         "In 6=$cid.cid@x#", noicon, nokey, nomark, plain;
  207.     }
  208. };
  209.  
  210. /***********************************|****************************************/
  211.  
  212. resource 'DLOG' (1000) {
  213.     {36, 30, 323, 476}, dBoxProc, visible, noGoAway, 0x0, 1000, "", alertPositionMainScreen
  214. };
  215.  
  216. resource 'DITL' (1000) {
  217.     {    {261, 340, 281, 440}, Button { enabled, "Set Value" },
  218.         {261, 232, 281, 332}, Button { enabled, "Delete Tuple" },
  219.         {261, 124, 281, 224}, Button { enabled, "Cancel" },
  220.  
  221.         { 32,  20,  78, 438}, EditText { enabled, "" },
  222.         {116,  20, 162, 438}, EditText { enabled, "" },
  223.  
  224.         {180,  20, 198, 217}, RadioButton { enabled, "Pascal string" },
  225.         {200,  20, 218, 217}, RadioButton { enabled, "C String" },
  226.         {220,  20, 238, 217}, RadioButton { enabled, "RString" },
  227.         {240,  20, 258, 217}, RadioButton { enabled, "Boolean" },
  228.         {180, 232, 198, 429}, RadioButton { enabled, "Longint (4 bytes)" },
  229.         {200, 232, 218, 429}, RadioButton { enabled, "Short (2 bytes)" },
  230.         {220, 232, 238, 429}, RadioButton { enabled, "Raw Data" },
  231.  
  232.         {  8,  16,  24, 156}, StaticText { disabled, "Attribute Key" },
  233.         { 92,  16, 108, 156}, StaticText { disabled, "Attribute Value" },
  234.     }
  235. };
  236.  
  237. /***********************************|****************************************/
  238.  
  239. #ifndef THINK_Rez
  240. include "BovineAboutBox.rsrc" not 'ckid';
  241. #endif
  242.  
  243. /***********************************|****************************************/
  244.